home *** CD-ROM | disk | FTP | other *** search
/ Computer Shopper 201 / DPCS1104.ISO / Full / QuickBooks / QBTutor / Lesson5 / Lesson5.dcr / 00018_submenu routines.ls < prev    next >
Encoding:
Text File  |  2001-02-01  |  789 b   |  41 lines
  1. global backButtonTarget
  2.  
  3. on ctrlSubMain me
  4.   sprite(130).locV = 0 - sprite(130).height
  5.   go("Bye")
  6. end
  7.  
  8. on ctrlSubCancel me
  9.   sprite(130).locV = 0 - sprite(130).height
  10. end
  11.  
  12. on ctrlSubItem me, thang
  13.   case thang of
  14.     1:
  15.       backButtonTarget = "Start 1"
  16.       go("Start 1")
  17.     2:
  18.       backButtonTarget = "RP Fast"
  19.       go("RP Fast")
  20.     3:
  21.       backButtonTarget = "Got Inv"
  22.       go("Got Inv")
  23.     4:
  24.       backButtonTarget = "Payola"
  25.       go("Payola")
  26.     5:
  27.       backButtonTarget = "Which Fast"
  28.       go("Which Fast")
  29.     6:
  30.       backButtonTarget = "Chosen Fast"
  31.       go("Chosen Fast")
  32.     7:
  33.       backButtonTarget = "Discounts zome"
  34.       go("Discounts zome")
  35.     8:
  36.       backButtonTarget = "Done"
  37.       go("Done")
  38.   end case
  39.   sprite(130).locV = 0 - sprite(130).height
  40. end
  41.